"! "
DrawingRobot subclass: Spiral [
<category: ''>
"! "
main [
|l|
self penWidth: 1.
self speed: 1024.
l := 10.
100 timesRepeat: [
	self fwd: l.
	self left: 89.
	l := l + 3.
].
]

]

"! "
MetaDrawingRobot subclass: MetaSpiral [
<category: ''>
]

